home *** CD-ROM | disk | FTP | other *** search
/ Instant Access / Instant Access CD-ROM Issue 1 (1993).iso / Instant Access / Graphics / Design / DesignStudio / •demo / DesignStudio Demo / DesignStudio Demo.rsrc / PSCD_272 < prev    next >
Encoding:
Text File  |  1992-09-18  |  190 b   |  10 lines
  1. 4 dict begin
  2. /gw 2 def/bw 22 def
  3. currentpoint/bY exch def/cX exch def
  4. 0 .1 .9{setgray bw 0 rlineto
  5. 0 bw rlineto bw neg 0 rlineto
  6. closepath fill
  7. /cX cX bw gw add add def
  8. cX bY moveto}for
  9. end
  10.